home *** CD-ROM | disk | FTP | other *** search
- ############################################################# -*- c -*-
- ## Generic include for columns. Do not use directly.
- ##
- ## $Id: details-node.m2i,v 1.5 2004/08/31 10:25:54 dts12 Exp $
- ########################################################################
- @if $m2c_mark_boundary == 1@
- /** START code generated by $RCSfile: details-node.m2i,v $ $Revision: 1.5 $ */
- @end@
- ########################################################################
- /*---------------------------------------------------------------------
- * $node.module::$node.parent.$node
- * $node is subid $node.subid of $node.parent.
- * Its status is $node.status, and its access level is $node.access.
- * OID: $node.objectID
- * Description:
- $node.description
- *
- @if $m2c_node_detail == 1@
- * node -- name $node
- * node.parent -- label of the parent $node.parent
- * node.objectID -- dotted full OID $node.objectID
- * node.commaoid -- comma separated OID $node.commaoid
- * node.subid -- last oid component $node.subid
- * node.oidlength-- length of the oid $node.oidlength
- * node.syntax -- node's syntax $node.syntax
- * node.perltype -- node's perl type $node.perltype
- * node.type -- node's ASN_XXX type $node.type
- * node.decl -- C data type $m2c_decl ($node.decl)
- * node.settable -- 1 if it's writable $node.settable
- * node.noaccess -- 1 if not-accessible $node.noaccess
- * node.access -- node's access type $node.access
- * node.status -- node's status $node.status
- * node.isscalar -- returns 1 if scalar $node.isscalar
- * node.iscolumn -- returns 1 if column $node.iscolumn
- * node.enums -- $node.enums
- *
- @end@
- * Attributes:
- * accessible $node.accessible isscalar $node.isscalar enums $node.enums hasdefval $node.hasdefval
- * readable $node.readable iscolumn $node.iscolumn ranges $node.ranges hashint $node.hashint
- * settable $node.settable
- @if $node.hasdefval == 1@
- * defval: $node.defval
- @end@
- @if $node.hashint == 1@
- * hint: $node.hint
- @end@
- *
- @if $node.enums == 1@
- @ eval $m2c_evals = ""@
- @ eval $m2c_first = 1@
- @ foreach $e $v enum@
- @ if $m2c_first == 1@
- @ eval $m2c_first = 0@
- @ else@
- @ eval $m2c_evals = "$m2c_evals,"@
- @ end@
- @ eval $m2c_evals = "$m2c_evals $e($v)"@
- @ end@
- * Enum range: $node.enumrange. Values: $m2c_evals
- @elsif $node.ranges == 1@
- @ eval $m2c_range_max = 0@
- @ eval $m2c_evals = ""@
- @ eval $m2c_first = 1@
- @ foreach $a $b range $node@
- @ if $m2c_first == 1@
- @ eval $m2c_first = 0@
- @ else@
- @ eval $m2c_evals = "$m2c_evals,"@
- @ end@
- @ if $a == $b@
- @ eval $m2c_evals = "$m2c_evals $a"@
- @ else@
- @ eval $m2c_evals = "$m2c_evals $a - $b"@
- @ end@
- @ eval $m2c_range_max = max($m2c_range_max,$b)@
- @ end@
- * Ranges: $m2c_evals;
- @end@ #ranges
- *
- * Its syntax is $node.syntax (based on perltype $node.perltype)
- * The net-snmp type is $node.type. The C type decl is $node.decl ($m2c_decl)
- @if $node.needlength == 1@
- * This data type requires a length. (Max $m2c_range_max)
- @end@
- @if $node.noaccess@
- *
- *
- *
- * NOTE: NODE $node IS NOT ACCESSIBLE
- *
- *
- @end@
- */
- ########################################################################
- @if $m2c_mark_boundary == 1@
- /** END code generated by $RCSfile: details-node.m2i,v $ $Revision: 1.5 $ */
- @end@
-